From: Kenichi Handa <handa@m17n.org>
Date: Tue, 14 Apr 2009 01:24:52 +0000 (+0000)
Subject: (Fdefine_charset_internal): Make charset
X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1~1^2~421^2~859
X-Git-Url: https://dgit.raspbian.org/%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:///%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:/?a=commitdiff_plain;h=32961201763b3e5b87595df9ba33165d99b88c51;p=emacs.git

(Fdefine_charset_internal): Make charset
ascii-compatible if the method is CHARSET_METHOD_OFFSET, the
code_offset is 0, and covers all ASCII characters.
---

diff --git a/src/charset.c b/src/charset.c
index 492849f6868..bfe34686629 100644
--- a/src/charset.c
+++ b/src/charset.c
@@ -1082,6 +1082,8 @@ usage: (define-charset-internal ...)  */)
       i = (i >> 12) << 12;
       for (; i <= charset.max_char; i += 0x1000)
 	CHARSET_FAST_MAP_SET (i, charset.fast_map);
+      if (charset.code_offset == 0 && charset.max_char >= 0x80)
+	charset.ascii_compatible_p = 1;
     }
   else if (! NILP (args[charset_arg_map]))
     {